home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1999 January / WPCJAN99.ISO / DXRS / Buyers01.dxr / acrobat loader_36_AcroBrowsein.ls < prev    next >
Encoding:
Text File  |  1998-11-09  |  464 b   |  16 lines
  1. on mouseUp
  2.   global DriveLtr, WARNINGenteringframe, pdfFileName, frameThatCalledPDFReview
  3.   openXLib("fileio")
  4.   set fioObj to fileio(mnew, "?read", EMPTY)
  5.   if not objectp(fioObj) then
  6.     return 
  7.   end if
  8.   put fioObj(mFileName)
  9.   set theFile to fioObj(mFileName)
  10.   set selectedfile to theFile
  11.   fioObj(mdispose)
  12.   put "**** open ", DriveLtr & pdfFileName & " with " & selectedfile
  13.   open(DriveLtr & pdfFileName, selectedfile)
  14.   go(frameThatCalledPDFReview)
  15. end
  16.